// Copyright (c) Microsoft
// All rights reserved
// Licensed under the Apache License, Version 2.0 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at http://www.apache.org/licenses/LICENSE-2.0
// THIS CODE IS PROVIDED *AS IS* BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION ANY IMPLIED WARRANTIES OR CONDITIONS OF TITLE, FITNESS FOR A PARTICULAR PURPOSE, MERCHANTABLITY OR NON-INFRINGEMENT.
// See the Apache Version 2.0 License for specific language governing permissions and limitations under the License.

/// <summary>Test 'copy_to' member function on array_views without a data source</summary>
// RUN: %amp_device -D__GPU__ %s -m32 -emit-llvm -c -S -O3 -o %t.ll && mkdir -p %t
// RUN: %llc -march=c -o %t/kernel_.cl < %t.ll
// RUN: cat %opencl_math_dir/opencl_math.cl %t/kernel_.cl > %t/kernel.cl
// RUN: pushd %t && objcopy -B i386:x86-64 -I binary -O elf64-x86-64 kernel.cl %t/kernel.o && popd
// RUN: %cxxamp %link %t/kernel.o %s -o %t.out && %t.out
#include <amp.h>
#include"../../../../../amp.compare.h"
#include"../../../../../../device.h"

using namespace Concurrency;
using namespace Concurrency::Test;

/*
* Testing 'copy_to' on array_view object created without data source.
* Source => array_view without data source , passed to p_f_e
* Destination => array object
*/
int test1(const accelerator_view &av)
{
    int result;
	const int M = 256;
	const int N = 256;
		
	array_view<int,2> arrViewSrc(M,N);
	array<int,2> arrDest(M,N);
	
	parallel_for_each(av, arrViewSrc.get_extent(), [=](const index<2> &idx) restrict(amp) {
		arrViewSrc[idx] = idx[0] * 10 + idx[1];
	});
	
	arrViewSrc.copy_to(arrDest); // Copying to Array
	result &= VerifyDataOnCpu(arrViewSrc,arrDest);
	return result;
}

/*
* Testing 'copy_to' on array_view object created without data source.
* Source => array_view without data source , passed to p_f_e
* Destination => another array_view object having data source
*/
int test2(const accelerator_view &av)
{
    int result;
	const int M = 256;
	const int N = 256;
		
	array_view<int,2> arrViewSrc(M,N);
	
	parallel_for_each(av, arrViewSrc.get_extent(), [=](const index<2> &idx) restrict(amp) {
		arrViewSrc[idx] = idx[0] * 10 + idx[1];
	});	

	std::vector<int> destVect( M * N , 0 );
	array_view<int,2> destArrView(M,N,destVect);
	arrViewSrc.copy_to(destArrView); // Copying to Array
	destArrView.synchronize();
	result &= VerifyDataOnCpu(arrViewSrc,destArrView);
	return result;
}

/*
* Testing 'copy_to' on array_view object created without data source.
* Source => array_view without data source , passed to p_f_e
* Destination => another array_view object having no data source
*/
int test3(const accelerator_view &av)
{
    int result;
	const int M = 256;
	const int N = 256;
		
	array_view<int,2> arrViewSrc(M,N);
	
	parallel_for_each(av, arrViewSrc.get_extent(), [=](const index<2> &idx) restrict(amp) {
		arrViewSrc[idx] = idx[0] * 10 + idx[1];
	});	

	array_view<int,2> destArrView(M,N);
	arrViewSrc.copy_to(destArrView); // Copying to Arrayview having no data source
	result &= VerifyDataOnCpu(arrViewSrc,destArrView);
	//destArrView.synchronize();
	
	return result;
}

/*
* Testing 'copy_to' on array_view object created without data source.
* Source => array object
* Destination => array_view object having no data source
*/
int test4(const accelerator_view &av)
{
    int result;
	const int M = 256;
	const int N = 256;
		
	std::vector<int> vecSrc(M * N);
	std::generate(vecSrc.begin(), vecSrc.end(), rand);
	array<int,2> arrSrc(M,N,vecSrc.begin(), av);
	array_view<int,2> arrViewDest(M,N);	
	
	arrSrc.copy_to(arrViewDest); // Copying to Arrayview having no data source
	arrViewDest.synchronize();
	result &= VerifyDataOnCpu(arrSrc,arrViewDest);
	
	// Verifying Data on Gpu
	int comp_result = 0;
	array_view<int,1> av_compare_result(1,&comp_result);
	parallel_for_each(av,arrSrc.get_extent(),[=,&arrSrc](index<2> idx) restrict(amp){
		if(arrSrc(idx) != arrViewDest(idx))
		{
			av_compare_result[0] = 1;
		}
	});
	av_compare_result.synchronize();
	result &= (comp_result == 0);
	return result;
}

/*
* Testing 'copy_to' on array_view object created without data source.
* Source => array_view object having data source
* Destination => array_view object having no data source
*/
int test5(const accelerator_view &av)
{
    int result;
	const int M = 256;
	const int N = 256;
		
	std::vector<int> vecSrc(M * N);
	std::generate(vecSrc.begin(), vecSrc.end(), rand);
	array_view<int,2> arrViewSrc(M,N,vecSrc);
	array_view<int,2> arrViewDest(M,N);	
	
	arrViewSrc.copy_to(arrViewDest); // Copying to Arrayview having no data source
	result &= VerifyDataOnCpu(arrViewSrc,arrViewDest);
	
	int comp_result = 0;
	array_view<int,1> av_compare_result(1,&comp_result);
	parallel_for_each(av,arrViewSrc.get_extent(),[=](index<2> idx) restrict(amp){
		if(arrViewSrc(idx) != arrViewDest(idx))
		{
			av_compare_result[0] = 1;
		}
	});
	av_compare_result.synchronize();
	result &= ( comp_result == 0 );

	return result;
}

int main()
{
	accelerator_view av = require_device().get_default_view();
	int res = 1;
	
	res &= test1(av);
	res &= test2(av);
	res &= test3(av);
	res &= test4(av);
	res &= test5(av);
	return !res;
}

